Show nobreak-space face for more blank characters in describe-char.

* lisp/descr-text.el (describe-char): Handle more non-ASCII whitespace
characters added in f018cffca0098ad1b82c51730a6d6cf146e3c488 (bug#44236)

diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index ec9a968013708930a16ef0e49b1190268c03dae7..075cb21c21a4b7d43bec3728a577dcf06722a998 100644 (file)
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -687,7 +687,8 @@ The character information includes:
                                   (save-excursion (goto-char pos)
                                                   (looking-at-p "[ \t]+$")))
                              'trailing-whitespace)
-                            ((and nobreak-char-display char (eq char '#xa0))
+                            ((and nobreak-char-display char
+                                  (eq (get-char-code-property char 'general-category) 'Zs))
                              'nobreak-space)
                             ((and nobreak-char-display char
                                  (memq char '(#xad #x2010 #x2011)))